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CIRCULO DE USUARIOS DE QL 


RERXAXRKXRKRRKRAXRKXARKXXKXRKKXRXKAKRRXKARKARKXRAXKAXK RARA ARKAKKXx* 


Fanzine mensual independiente para usuarios de Sinclair QL y compatibles 


Estamos en el año 9 Después de Sinclair. Toda Hispania está ocupada por las 
legiones de PCs. ¿Toda? ¡No! Un puñado de irreductibles QLs resiste todavía y 
siempre ante el primitivo invasor... 


Información sobre C.U.Q. 
Editorial "Y NOS VAMOS DE VACACIONES" 


___ NOT MGUK ROM 
___ CAR QL ¿UN ORDENADOR PARA FANATICOS? 
___ CAR QLAVE, O MEJOR, DIEGO ALCALA AUN TIMA A LA GENTE 
——_ HAR QL SYSTEM 2 
——_ HAR QEPROM 
___ BAS "A LA FUERZA AHORCAN"” O "EL HAMBRE AGUDIZA EL INGENIO" 
__ _ BAS PROGRAMA DE ENCUESTAS ALIMENTARIAS 
___ SPE COMUNICANDO QL A SPECTRUM VIA RED LOCAL 
__ PRO QZ TRANSFER 
__ PRO BIOGRAPH 
__ FITH RECTIFICAR ES DE SABIOS 
__ ZET VERSION BONOLOTO PARA Z88 
___ OTR QUELE CLUB 
___ OTR NEW AGE MUSIC 
OFE BUSCANDO AMPLIACION 512K RAM 


Programas de este número 
Manuales traducidos 
En próximos números 


Compilación de colaboraciones: Salvador Merino 

Títulos y texto "Información sobre C.U.Q.": Marcos Cruz 

Sub-Distribución: Marcos Cruz 

Imagen de la portada: BI0Ograph 

SE CONSIENTE LA REPRODUCCION TOTAL O PARCIAL DEL CONTENIDO DEL FANZINE, PARA 
USO CULTURAL Y NO COMERCIAL, POR CUALQUIER MEDIO FISICO, QUIMICO, OPTICO, 
MAGNETICO, SOLAR, MECANICO, HIDRAULICO, EOLICO, ELECTRICO, NUCLEAR O A PEDALES, 
SIEMPRE Y CUANDO SE CITE LA PROCEDENCIA (¿EH? ¡OJO!). 

El fanzine C.U.Q. es un medio de comunicación e intercambio de ideas y 
conocimientos entre usuarios de ordenadores Sinclair QL y compatibles. El 
fanzine se realiza mediante la colaboración desinteresada de todas las personas 
que lo desean. 
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¿COMO SE PUEDE RECIBIR EL FANZINE? 

El fanzine se envía a quien contribuye a su realización aportando alguna 
colaboración, o bien a quien lo solicita sin más. 

Quienes sólo quieran recibir el fanzine, sin enviar ninguna colaboración 
para que sea incluida en él, deberán enviar UN disco formateado de 3.5 pulgadas 
o DOS microdrives formateados, junto con un sobre franquedo y con las señas 
escritas para el reenvío. Estos discos o microdrives SIN COLABORACIONES deben 
enviarse a: Marcos Cruz, Acacias 44, 28023 Madrid 

El fanzine de cada mes estará disponible, para ser enviado a quien lo 
solicite, a finales de la primera semana de dicho mes, con lo cual pueden 
enviarse las peticiones a comienzos de mes. 


¿COMO SE PUEDE COLABORAR EN LA REALIZACION DEL FANZINE? 

Quien desee colaborar en la realización del fanzine, debe igualmente enviar 
UN disco de 3.5 pulgadas o DOS cartuchos de microdrive (aunque sólo uno contenga 
algo) junto con un sobre franquedao y con la dirección escrita para el reenvío. 
Estos discos o microdrives CON COLABORACIONES deben enviarse a: Salvador Merino, 
Ctra. Cádiz (Cerámicas Mary), 29640 FUENGIROLA (Torreblanca del Sol), MALAGA 

¿Qué puede enviarse como colaboración? Cualquier cosa: artículos, cartas, 
opiniones, preguntas, respuestas, ideas, sugerencias... Si bien el nexo de unión 
entre quienes hacen posible C.U.Q. es el interés y la inquietud por el ordenador 
Sinclair QL, y por la informática en general, y esa es la temática global del 
contenido del fanzine, C.U.Q. acepta artículos sobre cualquier tema que pueda 
interesar a los lectores. 

Con todas las colaboraciones recibidas a lo largo de un mes, se confecciona 
el fanzine correspondiente al mes siguiente. Los discos y microdrives con los 
boletines se echarán al correo en el último fin de semana del mes. 

No deben enviarse más colaboraciones hasta haber recibido de vuelta los 
discos o microdrives con el fanzine del mes correspondiente. 


FORMATO DE LAS COLABORACIONES 

Los textos deben ser ficheros _doc del programa Quill1, con los siguientes 
márgenes: izquierdo=1, derecho=80, sangrado=5. Los textos deben ir justificados 
a la derecha, y no deben emplearse caracteres no castellanos cuyo código ASCII 
sea mayor de 127. Tampoco deben usarse los corchetes cuadrados, ni las llaves, 
ni las barras vertical o inclinada hacia la izquierda. 

Los artículos deben agruparse temáticamente según las siguientes secciones: 


CAR Cartas abiertas 

NOT Noticias 

LIB Comentarios de libros y otras publicaciones 
PRO Comentarios de programas 

HAR Comentarios sobre hardware, y montajes 

BAS Lenguaje SuperBASIC 

FTH Lenguaje Forth 

LEC Lenguaje € 

ASM Lenguaje ensamblador 68000 

COB Lenguaje COBOL 

MAN Manuales traducidos 

ZET Z88 

SPE Spectrum 

OFE Ofertas, compra-venta, anuncios particulares 
OTR Otros temas de interés, aunque no sean informáticos. 


Esta lista podrá ser ampliada o modificada por el recopilador, a sugerencia 
de los colaboradores. 

En el caso de que la colaboración consista en preguntas, o respuestas, 
deberá igualmente incluirse en una de las secciones indicadas, según el tema de 
a que se refieran. 

Todas los artículos que pertenezcan a una misma sección deben ir en un mismo 
fichero. El nombre de este fichero tendrá el formato siguiente: SSSxxnnn_doc, 
donde "SSS" son los tres caracteres correspondientes a la sección de destino del 
texto, "xx" es el número de fanzine al que se envía el texto y "nnn" son las 
iniciales del autor. 

En el texto, el título de cada artículo deberá ir en mayúsculas, en letra 
negrita, y a la izquierda de la línea (en el margen de sangrado). Excepto la 
letra negrita en los títulos de los artículos, no deberá emplearse ningún tipo 
de letra (subrayada, negrita, subíndice o superíndice) en los textos. 

Deberá dejarse siempre UNA SOLA línea en blanco para separar el título de un 
artículo del artículo anterior, si lo hay. Dentro de cada artículo deberá 
evitarse por completo el incluir líneas en blanco, tanto para separar párrafos 
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como por cualquier otro motivo, con el objeto de ahorrar espacio en las copias 
impresas. 

Al final de cada cada artículo debe ir el nombre del autor, en la columna 
40, seguido en la misma línea por la localidad y la fecha. 

Algunas importantes recomendaciones a observar: 

-Déjese siempre un espacio detrás de cada signo de puntuación (coma, punto, 
punto y coma, dos puntos) ¡pero no delante! 

-No deben aislarse con espacios los signos de interrogación, admiración, 
guiones O paréntesis, sino que deben estar unidos a la palabra siguiente -si son 
signos de apertura- o anterior -sin son de cierre. 

-Cuídense tanto la ortografía y las tildes como los errores de "tecleo". 
Para ello, es recomendable releer lo que se ha escrito. 


¿EN QUE FORMATO SE RECIBE EL FANZINE? 

El fanzine se recibe en forma de varios ficheros _doc del procesador Quill, 
al objeto de permitir el acceso al mísmo de los usuarios que no tienen unidades 
de disco y/o ampliación de memoria. 

El nombre de cada fichero indica el número de fanzine al que pertenece y la 
sección que contiene. 

Para componer el fanzine debe cargarse el fichero CUQxxPOR (donde "xx" es el 
número de fanzine) y seguidamente deben UNIRse al final del texto, uno a uno, 
los ficheros de las restantes secciones en el orden que indique la columna 
"Sección" del índice del fanzine. Seguidamente puede alterarse el número de 
líneas por página, asignarse un pie de página y/o un encabezamiento y, si se 
desea, añadir cambios de página forzados para evitar que los títulos de 
secciones o artículos queden al final de alguna página. Finalmente, se ha de 
grabar el fanzine completo en disco y/o sacar una copia por impresora. 

Si, por falta de memoria, no puede componerse todo el fanzine entero, deberá 
imprimirse por partes, a juicio de cada uno. 

Una vez tenemos el fanzine en papel, habrá que rellenar a mano los números 
de página del índice. 


¿PUEDEN INCLUIRSE DIBUJOS EN EL FANZINE? 

Normalmente la portada llevará un dibujo (preferiblemente relacionado con 
alguno de los artículos del fanzine). El dibujo será un fichero de pantalla, en 
modo 4 u 8. El nombre de estos ficheros debe ser: DBPxxnnn_MODEm, donde "m" es 
el modo de pantalla en el que están realizados. Como en los textos, "xx" es el 
número del fanzine de destino, y "nnn" son las iniciales del autor. 

El dibujo elegido por el recopilador para ser la portada del mes, se 
incluirá en el fanzine con el nombre CUQxxDBP_MODEm (donde "xx" es el número de 
fanzine y "m" indica el modo de pantalla, 4 u 8). Este fichero deberá emplearse 
para sacar un "hard-copy" sobre el folio de la portada. 

La inclusión de dibujos en los artículos aún no es posible, pero están en 
estudio varios métodos posibles. 


¿COMO ENVIAR PROGRAMAS AL FANZINE? 

El fanzine C.U.Q. sirve también como intercambio de programas (PROGRAMAS 
REALIZADOS POR LOS MISMOS COLABORADORES, "NO PROGRAMAS COMERCIALES). Estos 
programas pueden estar realizados en cualquier lenguaje disponible para el QL. 
En la medida de lo posible, y siempre que su longitud no sea excesiva, los 
textos fuente de dichos programas deben incluirse en un artículo (en la sección 
del lenguaje correspondiente) en el que se explique el funcionamiento u otros 
detalles que el autor considere oportuno. Los listados de programas que se 
incluyan en el boletín, no deberán tener líneas con más de 80 caracteres. Si el 
autor prefiere no ceder al fanzine el texto fuente, deberá igualmente escribir 
las instrucciones de manejo en un pequeño artículo, para su inclusión en el 
fanzine. 

El fanzine C.U.Q. no mantiene una librería de programas como tal, puesto 
que, por enviarse éstos en el mismo disco del fanzine, no es necesaria. No 
obstante, si alguien precisa alguno de los programas, puede solicitarlo. 

Normas a tener en cuenta para enviar programas al fanzine. 

-Póngase a cada fichero una extensión adecuada que indique su tipo, por 
ejemplo: 

_bas si es un programa en SuperBASIC 

_exe O _task si es un programa EXECutable 

_bin si es código máquina no EXECutable 

_txt o_asc si es un fichero de código ASCII 

_fth si es un texto fuente es Forth 

_scr si es una pantalla, o un fichero fuente del Forth de Computer One 
. . etcétera 
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-Póngase a todos los ficheros de un mismo programa un mismo nombre inicial, 
que no coincida con alguna de las referencias de los programas ya existentes. Si 
entre los ficheros de un programa existe un fichero _doc del Quill, o de otro 
paquete de Psion, el nombre inicial común a todos los ficheros no podrá, por 
tanto, ser más largo de 8 caracteres. 

-No deben emplearse en los nombres de los ficheros caracteres que no sean 
aceptados directamente, es decir, que no sea necesario encerrar el nombre entre 
comillas para manipular el fichero. 

-Deben escribirse instrucciones detalladas del manejo de los programas, bien 
dentro del mismo programa, o en un artículo que aparezca en el fanzine, o bien 
en un fichero _doc. 

Los programas deben enviarse, como las colaboraciones escritas, a: Salvador 
Merino, Carretera de Cádiz (Cerámicas Mary), 29640 FUENGIROLA (Torreblanca del 
Sol), Málaga. 


Todavía no ha terminado el mes de junio, y hace muy pocos dias que 
llegó el temido verano. Todos mis objetivos han sido hechos realidad 
antes de la fecha prevista. No solamente hemos conseguido entre todos 
tener este número preparado 2 meses antes de su fecha de entrega, sino 
que también tenemos el próximo casi terminado 2 meses antes. Como es 
natural, nos merecemos unas pequeñas vacaciones, las cuales nuestros 
QLs nos agradeceran, porque no han sido diseñados para resistir las 
calores del verano (fuente de alimentación pobre y sin ventilación, 
máquina con muy poca ventilación y sin sistema de refrigeración, la 
enorme RAM que disponemos actualmente consume mucha energia y desprende 


mucho calor,...... Pero aunque el QL se cuelgue en el momento menos 
oportuno, vuelve y vuelve otra vez al combate sin dar señal de fatiga 
o pereza). 


Dennis Briggs (Adman Services, 53 Gilpin Road, Admaston, Telford, 
Shropshire TF5 0BG) ofrece una nueva fuente de alimentación para el QL 
con ventilador (Switch Mode Supply Cased With Fan Cooling) por 21 
libras. Yo aún no la he pedido, porque Dennis en el pasado siempre me 
ha tardado en servir 3 o 4 meses, y creo que no está muy interesado en 
servir fuera de UK, 

Mi QL con Trump Card+Q-power funciona bastante más frio que los QLs 
normales (standard 128K). En invierno puede estar funcionando 5 horas 
seguidas sin problemas, pero en verano a las 3 horas la fuente de 
alimentación está ardiendo y da problemas de cuelgues. Tanto que si 
hacemos un reset después de un cuelgue a los 5 o 10 minutos se cuelga 
otra vez. La única solución que he probado hasta hoy con éxito es 
cambiar a las 2 horas la fuente de alimentación por la de mi segundo 
QL, y asi poder trabajar 4 horas sin cuelgues. El problema reside en la 
fuente de alimentación que cuando se sobrecalienta no debe funcionar 
correctamente (creo que no ha sido diseñada para alimentar tanta RAM y 
periféricos). 

En el Z88 es otra historia. En los 2 meses que lo tengo, no he tenido 
ningún problema. Cuando se alimenta con el adaptador de corriente y hay 
un corte de energia, no pasa nada porque están las 4 pilas que 
alimentan al Z88 en modo de reposo o trabajo. Tio Clive esta vez ha 
rectificado algunos problemas de la anterior saga Sinclair. El Z88 
basado en Z80 parece un salto cuántico hacia atrás, pero su sistema 
operativo corresponde a los años noventa (la era UNIX o de los sistemas 
operativos multitarea con diferentes variantes) y hasta hace muy poco 
era el único ordenador personal verdaderamente portátil (el Atari PC 
Folio no me convence). 

S. Merino 
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MGUK ROM 


MGUK (Richard Alexander) consiste en 2 chips que contienen una nueva 
versión del sistema operativo QDOS y un Toolkit. Es distribuido con 
manuales por Sector Software por 24 libras. 

Creo que se trata de la misma versión que se suministra con el DIY QL 
PC (significa hagase usted mismo un QL personal computer). Aunque no sé 
quien está cualificado en España para construirse su propio ordenador a 
base de piezas sueltas. 

S. Merino, Fuengirola, 28/6/1989. 


QL ¿UN ORDENADOR PARA FANATICOS? 


Recientemente podíamos leer en las páginas de este boletín un comentario en 
este sentido sobre los usuarios del QL. La afirmación venía de nuestro amigo 
Nacho Enrique, con el que debo afirmar que en éste punto concreto no estoy de 
acuerdo. No es que vaya a negar que los ususrios del QL tengamos ciertas 
características especiales, pero la calificación de fanáticos no me parrece del 
todo ajustada: creo que sería mucho más acertado decir OBSESOS 

Os explico la razón de este enrolle. Hace unos días me acerqué por el Corte 
Inglés a buscar una cinta para la impresora (últimamente las suelen tener a 
mejor precio que en otros sitios). Al entrar en el departamento de informática 
hubo algo que llamó mi atención entre todo aquel marasmo de PCs: junto a una 
vieja televisión en blanco y negro descubrí la negra figura de uno de nuestros 
queridos QLs. Rápidamente me hacerqué y ¡Cuál no sería mi sorpresa cuando leí la 
pequeña etiqueta escrita en rotulador rojo!: "9995 Pts.". Tengo que confesar que 
me puse nervioso; busqué rápidamente un vendedor (con la vista, ya que no me 
atrevía a separarme del QL por si me lo quitaban) y le dije: "Quiero verlo 
funcionar.". Me miró con una expresión a medio camino entre el aburrimiento, la 
incredulidad y la sospecha de que alguna terrible degeneración mental debía 
padecer para interesarme por ese cachivache. Indolentemente conectó el televisor 
y comenzó a mirar entre el follón de cables que tenían organizado en la mesa, 
hasta que no pude más y me decidí a intervenir: conecté la alimentación al QL y 
regulé el canal del televisor hasta que apareció nítidamente el mensaje 
consabido: "F1...MON F2 TV". Pulsé F2 y allí estaba el cursor parpadeante 
como el jadeo de un perro abandonado esperando la caricia de una mano amiga; 
tecleé PRINT VER$ y en el canal O aparecieron tan sólo una parte de los 
caracteres. Le dije al vendedor: "La membrana está rota." No logré modificar su 
expresión ni un ápice. Ojee con más de tenimiento el QL comprobando que en 
alguna ocasión había sido usado, pero tampoco demasiado; además los precintos de 
garantía sobre los tornillos habían sido violados: no me importó, "Me lo llevo, 
ya arreglaré yo la membrana.". Con su impasividad casi británica me contestó: 
"Imposible, no podemos venderle un ordenador que no funciona correctamente."; me 
dejó helado, mi angustia tuvo que dibujarse por fuerza en mi rostro "¡Pero yo 
quiero comprarlo!". "En todo caso, podemos enviarlo a reparar y dentro de unos 
días le llamaremos para comunicarle si tiene arreglo.", apuntó mi teléfono, se 
dió media vuelta y desapareció en la jungla de PCs. Me quedé totalmente 
desconsolado junto al QL tan cercano a mi y que no podía conseguir. Comencé a 
caminar en dirección a la salida y conforme me alejaba me iba llenando de dudas: 
¿cómo podía dejar el QL, MI QL (pues ya lo sentía como mío) a merced de 
cualquier depredador que se me adelantase y se lo comprase a otro de los 
vendedores?, ¿lo llevarían realmente a reparar o lo dejarían olvidado sin más?, 
una vez reparado ¿me llamarían realmente o me dirían que no tenía arreglo para 
quedarse en otras manos?. Volví sobre mis pasos y busqué de nuevo al mismo 
vendedor: "Preferíría dejar una señal.", "No es posible dejar una señal, pero 
podemos firmar la operación condicionalmente."; me consoló el tener un papelito 
firmado, aunque no me dejaba del todo tranquilo. Cuando el vendedor vió que no 
acababa de separarme del ordenador debió intuir todas mis dudas: sacó un 
rotulador rojo del bolsillo de la chaqueta y escribió sobre la etiqueta 
"VENDIDO" y recogió la fuente de alimentación y los cables. Ya algo más 


cuq11.txt Agosto 1989 


CUQ número 11 6 / 21 


tranquilo me logré marchar para casa. 

Los días que siguieron se me hicieron muy difíciles por la espera, pero al 
cabo de una semana exacta recibí la llamada: "¿Don José Carlos de Prada?, ya 
pueda usted pasar a recoger su QL. No ha sido posible repararlo pero hemos 
conseguido otro en perfecto estado". Salí corriendo; cuando llegué lo tenían 
preparado en una bolsa de plástico: un manual en inglés totalmente nuevo, la 
traducción al castellano de la instrucciones de los programas de Psion también 
totalmente nuevas, la fuente de alimentación que ya había visto la semana 
anterior y el QL. Lo revisé cuidadosamente: por la numeración supe que era el 
mismo que ya había visto, sólo que se le había cambiado el teclado entero. 
Faltaban las patitas y los programas de Psion; me dijeron que no habían podido 
localizarlos. Me marché a casa sin probarlo. En el autobús no podía dejar de 
mirarlo y acariciarlo. Al llegar a casa lo conecté antes incluso de quitarme la 
cazadora. La membrana nueva tampoco funcionaba; los programas arrancados 
directamente desde un boot corrían perfectamente hasta donde me permitía 
probarlos la membrana. Decidí arregarlo por mi cuenta evitándome pasar nuevas 
angustias. 

Al día siguiente me marché a Valente, que por cierto ya no se llama Valente 
sino "MCB Informática", y compré una nueva membrana. Ahora tengo mi segundo QL 
en la oficinilla de mi consulta; estoy poniendo al día mis archivos y escribo 
mis informes allí mismo sobre un microdrive que luego paso a disco y a papel en 
casa. 

Espero no haberos aburrido con esta historia truculenta pero con final 
feliz. En todo caso no creo haber exagerado mucho. 

¿Dije en algún momento obsesos?, debí decir ADICTOS. 


José Carlos de Prada 


QLAVE, O MEJOR, DIEGO ALCALA AUN TIMA A LA GENTE 

Hola Salvador y demas parentela: 

Primero quiero presentarme, soy Miguel Frasquet, valenciano, de 35 años, 
casado, con dos enanos, medico (actualmente con trabajo), con un Spectrum 48k, 
y con un QL ampliado. Mis aficciones son la vela y la informatica. 

Cuando hace unos quince dias recibi el paquete con 3 discos me quede un 
tanto impresionado, cuando ayer complete su lectura me quede gratamente 
impresionado. Quiero desde ya y antes de que se me olvide agradeceros a todos 
el que me incluyais en este grupo, yo intentare (en la medida de mis escasos 
conocimientos) ayudar en lo que me sea posible y estoy abierto a todo tipo de 
proposiciones (ojo con el AIDS). 

He leido el un numero de CUQ un comentario sobre STAT, yo tambien lo tengo y 
no va mal, conforme en que esta fatal escrito y que no es rapido (sobre todo en 
cargarse, superbasic con merges) pero como dicen en el comentario es de lo poco 
que hay de estadistica. No obstante en el paquete de ALSI hay una parte de 
estadistica (tambien mal escrita) que puede completarlo. Yo por mi parte he 
manejado ambas y pued decir que son complementarias. Yo uso el de ALSI pero 
modificado a mi conveniencia, ademas le he añadido alguna cosilla como ANOVA 
(analisis de varianza) y la posibilidad de trabajar con ficheros _exp con lo 
que puedes directamente acceder al paquete de Psion para todo. Si hay alguien 
interesado lo puedo mandar a la libreria (el programa original no es mio pero 
esta muy modificado). 

Respecto a la supuestamente extinta QLAVE, yo puedo decir que si que hay 
tontos que pagaron la renovacion de 1989, yo estoy entre ellos y hasta ahora lo 
unico que he conseguido es la carta que veis a continuacion: 


Zaragoza 21/2/89 


Hola Miguel: 


Te mando rapidamente tu microdrive, por si tienes que 
utilizarlo pronto. Tu Colaboración la publicaremos 
inmediatamente para que las dudas que te surgen las conteste 
gente que tenga tu mismo problema. 


Qlave ha seguido una politica de no favorecer el pirateo 
informático y ha querido ser un Club de amigos interesados 
por una máquina común, pero también entendemos que hay casos 
especificos y como tú mismo dices algunos programas son muy 
caros para alguna gente y tu propuesta es bastante lícita. 
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Desde aquí te animamos para que muevas el grupo local de 
Valencia y os reunaís más a menudo, aunque ya sabemos todos 
que aveces es dificil por el poco tiempo que dispone la gente 
para su tiempo libre. 


Si quieres proponer cualquier idea o proyecto, ponte en 
contacto conmigo, tienes el Club abierto a cualquier 
iniciativa que propongas. 


Y para adelantarte algo del proximo boletín hay te mando 
una serie de colaboraciones. 


Un saludo Miguel, 


Diego Alcalá (Presidente de Qlave) 

Las colaboraciones a las que hace referencia son las que se pueden leer en 
el CUQ1 O CUQ2. Respecto a mi colaboracion era un comentario sobre el QL System 
2 que podeis ver en la seccion de HAR. 

En cuanto al asunto del grupo de Valencia solo puedo decir que me siento mas 
solo que la una, aqui han emigrado o se encuentran en paradero desconocido 
todos los QL que yo conocia. Solo me quedan los de la Facultad de Farmacia con 
los que colaboro haciendoles programas y manteniendo los aparatos (hoy una 
membrana que falla, otro dia un mdv que no quiere formatearse, etc). De hecho 
yo estoy haciendo la tesina con un programa de encuestas alimentarias que envie 
a la biblioteca pero como dice Salvador hacen falta instrucciones (estoy en 
ello) para manejarlo bien. 

Desde aqui quiero hacer alguna proposicion: 

-Seria factible meter la placa del QL en un PC de forma que compartieran las 
unidades de disco, monitor, teclado y la fuente de alimentacion. Yo creo que no 
debe ser muy dificil, pero mis nulos conocimientos de electronica igual me 
tienen engañado. 

-Yo tengo la ¡interface de microperipherials de disco (la que vendia 
Investronica) con la eprom cambiada por la Qflp. ¿Podria cambiar esa eprom por 
otra que tuviera el toolkit 2?. 

Para cualquier sugerencia me podeis llamar o escribir o bien usar este medio 
de comunicacion, ahi van mis señas: 

Miguel Frasquet Pons C/Marcelino Giner 10 -14a 46020 Valencia 
telf :3619574 

Tengo algunos programas propios pero no estan presentables poco a poco los 

ire puliendo y enviando. 


QL SYSTEM 2 

No se alteren vuestras mercedes, que no es oro todo lo que reluce. 

No es un nuevo clon del QL es un QL metido en una caja. Bueno una caja un 
poco especial. Esta caja de aluminio es del mismo aspecto que la del THOR y en 
numeros atrasados de QLW la podeis ver fotografiada. Yo la consegui de Spenm, 
que por si alguno no lo sabe es una casa italiana que trabaja con el QL tanto 
en hard como en soft. En soft suelen ser un poco piratillas pero tambien son 
muy formales y puedes trabajar a contrareembolso en pesetas. 

En la caja colocas la placa madre del QL en la parte trasera, 
longitudinalmente, de forma que coinciden todas las salidas (rom, ser2,ser1, 
etc) con las ranuras que tiene hechas al efecto. De esta forma tienes a la 
derecha la ranura del bus de expansion y a la izquierda el boton de reset. El 
ancho de la caja es pues melsades mun QL. En cuanto al bus de expansion hay una 
quequeña diferencia, es multiple oO sea que realmente no aparece a la derecha 
sino que insertas la placa en una ranura que provee de 5 bus de expansion: 

1 para la propia PCB 

2 para interface de disco(invertida, curiosamente) 

3 para expansion de memoria (libre en mi caso) 
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4 para una Qeprom (en mi caso) 

5 es la que aparece a la derecha y permite conectar cualquier cacharo en la 
forma habitual 

Tambien en la parte posterior de la caja encontramos un interruptor general. 

Vamos a la cara anterior de la caja. 

Hay 2 hboquetes mas que ranuras en el central colocamos los mdv. Sencillo 
¿verdad ?. Pues aqui comienza lo mas emocionante, hay que cortar la caja 
original del QL sobre los mdv de forma que insertaremos ese trozo en la caja de 
aluminio. Esto es mejor hacerlo sin los mdv dentro, se desmontan con facilidad. 
Yo la recorte y despues corte la parte trasera para mejorar la ventilacion (ojo 
con los agujeros de los tornillos) 

Bien ya se ven los mdv por delante. Proseguimos con nuestra chapuza y 
llegamos a las unidades de disco que quedaran una sobre la otra en la parte 
anterior derecha. Yo les tuve que quitar las carcasas pero entraron. 

Detras de los discos coloque la fuente de alimentacion de los discos, cabe 
justa. Asi podeis ver la profundidad de la caja (PCB+ alimentador discos+ 
discos longitudinales). 

Detras de los mdv coloque la fuente de alimentacion principal con un filtro 
de aquellos que conseguia Guzman de Sevilla. 

Ya esta todo dentro, sobra sitio a la izquierda que segun dice la 
propaganda es para poner un disco duro (muy duro veo yo ese asunto). 

Junto con la caja viene un teclado tipo PC con una cinta plana de conexion 
que colocas en vez de la famosa cinta de la membrana en su conector, pasa por 
una ranura que hay centrada en la caja en su parte inferior o suelo y se va a 
conectar en otro conector semejante del teclado (no es de membrana). 

Si alguna vez habeis abierto el QL sabreis que no es posible hacer lo que 
yo he contado sin la ayuda de prolongaciones de los conectores. Pues bien hay 
prolongadores para todo leds incluidos. Tambien viene el famoso 75508 que 
sustituye al 7508, es de igual tamaño. 

Yo he atornillado a la caja (de aluminio) todos los reguladores para que 
disipen mejor el calor, tambien tengo directamente atornilladas las fuentes de 
alimentacion (sin caja). Con todo esto la caja de aluminio toma una temperatura 
tibia que no creo que afecte al aparato. 

Tambien venia un ventilador con el kit. Yo lo monte y a los pocos dias me 
di cuenta de que no funcionaba, si le ayudaba a arrancar si que funfionaba. 
Mirandolo con mas detenimiento vi que es de 24 voltios y yo lo alimento con la 
fuente del QL (12 v aprox.) , total que lo retire. 

Como conclusion de este rollo dire que con un soldador y un poco de maña se 
puede montar. 

En cuanto a precio viene a salir por 17000 la caja con sus aditamentos y 
17000 mas para el teclado, la Qeprom cuesta sobre 9000. 

Creo que con un poco de paciencia y algo de maña se puede hacer algo 
parecido oO mejor partiendo de una caja de PC (4000-7000 pts) y con la interface 
de ABC comentar un teclado de PC (9000-12000). Creo que Serafin lo hizo asi. 


QEPROM 

Es otro de los inventos de Spem. Consiste en una placa que se conecta al 
bus de expansion del QL y que tiene 3 zocalos para poner eprom con programas. 
Utiliza la zona de memoria entre C0000 y FFFFE , se pueden colocar hasta 192K 
en eprom de 64K. (Trump-Card 2???) 

Spem tiene programas disponibles e incluso dice que te puede poner el que 
tu le digas( con el programador de eprom de QJUMP). 

Yo en la actualidad lo tengo vacio. Ya vere que le meto. 

Por si resulta de interes ahi va la direccion de Spem 

Telf: 011-857924 de 9 a 13 y de 15 a 19,30 

SPEM Via Aosta 86 10154 Torino ITALIA 

Tienen hard y soft.(El Archimedes que comenta Salvador en otro numero de 
CUQ esta a la venta por 250000 aprox.). Son gente formal. 

Miguel Frasquet 31-5-89 
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"A LA FUERZA AHORCAN"” O "EL HAMBRE AGUDIZA EL INGENIO" 


Esto es la historia de una necesidad.No se si ya realmente va a remediar a 
algun colega,pero como he recibido varias cartas y llamadas telefonicas 
instandome a ello me siento en la obligación de hacer público el método empleado 
por mi para tener copia de seguridad de los programas en Mdv. almacenandolos en 
cintas de casette normales. 

Esto ocurrió en una época en que los Mdvs pasaron de 1200 pts a 675 (Precios 
de El Corte Ingles).Esta circunstancia alivió a muchos el grave problema de 
tener copias de seguridad de sus programas a un precio decente , pero el hecho 
de que consiguiera relaccionarme con varios colegas e intercambiase unos cuantos 
programas vino personalmente a agravar el mio.Asi que hubo que atornillarse el 
ingenio y con mas interés que conocimientos (Ahora se un poquito mas,solo un 
poco) lanzarse a la busqueda de un metodo que de una manera economica me evitase 
la angustia del "XXX Medio incorrecto" 

Quiero hacer incapié que el método es casi rudimentario, que cualquier 
programador medianamente experto lo hubiese hecho mejor,que la programación como 
queda claro al analizar el método no es mi fuerte,pero que ,bueno,la verdad es 
que funciona y funciona bien,así que aplicaremos el lema de que un programa es 
bueno si hace aquello que esperamos de él. 

En primer lugar diré que el método empleado consiste en comunicar el Q1 con 
un Spectrum + Interface 1amtravés de las respectivas RS-232.Por supuesto hay 
que confeccionarse el cable adecuado a los conectores de que se dispongan (En mi 
caso tengo multiplados los conectores "raros" del Q1 con otros tipo D de 9 pins) 
con la disposición conocida como Modem Nulo: 2 con 3,3 con 2,4 con 5,5 con 4 y 
7 con 7 ( o sus equivalentes segun conector). 

Con el fin de hacerlo lo mas automático posible y no tener problemas con 
identicación de fin de ficheros y otros problemillas anexos al método se me 
ocurrió utilizar una rutina que viene en el Mdve. de demostración que te dan 
cuando compras el cassette de Mdv del Spectrum y que se llama "COPIER". 

Esta rutina crea unas extensiones al Basic del Spectrum que permite hacer 
copias en casette de un fichero que tengamos en el Mdv sin preocuparnos del tipo 
que sea ni de su longitud y recuperarlo después de cinta de casette a Mdv de una 
forma automatica. 

Estas extensiones, entre otras, son: 

* MOVE "m";1;a$ TO "c" (Pasa el fich.a$ del Mdv1 a "casette") 

* MOVE "c";;" " TO "m";1 (Pasa el primer fich.que venga de cinta a mdv1) 

Esto tiene la ventaja que en la recuperación los nombres de los diferentes 
ficheros de la cinta son los mismos que los originales, restaurandose el Mdv del 
Spectrum tal cual como era cuando lo pasamos a cinta. 

Además este programa tiene la ventaja de que cuando el fichero sobrepasa los 
36 Kbytes lo graba en cinta en dos partes como PART1 y PART2 e incluso en PART3 
si es necesario, quedando limitada la capacidad del método solo por la capacidad 
del cartucho de Mdv que utilicemos(Entre 91 a 93 Kbytes). 

Como os habreis dado cuenta ya, lo original de mi idea fué que si yo tenia 
un cartucho de Mdv del Spectrum y podia pasarlo a casette de una manera facil y 
semiautomatica estaba claro que para resolver mi necesidad solo me faltaba ya el 
pasar el Mdv del Q1 al formato del Mdv del Spectrum. 

Y manos a la obra. 

Me hacian falta dos programas,uno para cada micro,que me gobernasen las 
puertas serie en ambos sentidos ya que de nada me servia pasar los ficheros al 
Spectrum si después no podia recuperarlos al QL. 

En el programa para QL que llamé TRANSQL y en su línea 120,carga un fichero 
llamado "ramdisk" de 8192 Bytes que no es otro sino el fichero G.B. que viene en 
el emulador de CP/M de QLSOFT y que en realidad es una Ramdisk dinamica muy 
rápida y cómoda ya que se adapta en todo momento a la extension de la memoria 
libre y no hace falta formatearla ya que su extensión es variable. 

La verdad es que desde que la descubrí la incluí en el BOOT de arranque del 
ordenador de manera que la tengo siempre cargada ademas del Toolkit II y otras 
rutinas menores. 

A continuación os listo TRANSQL: 


100 CLS +42:CLS +41:CLS H0:MODE 8 
110 a=RESPR (8192) 

120 LBYTES mdv1_ramdisk,a 

130 CALL a,0,0,0,0,0,0,0,a+5120 
140 CALL a+6144 

150 CALL a 

160 MENU 
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170 DEFine PROCedure CASSQL 

180 BAUD 9600:CLS +0:CLS +1:CLS +2 
190 INPUT "¿Nombre?..";a$ 

200 COPY ser1 TO "ram1_"g£a$ 

210 COPY "ram1_éga$ TO "mdv1_"8a$ 
220 DELETE "ram1_"£a$ 

230 MENU 

240 END DEFine 

250 DEFine PROCedure QLCASS 

260 BAUD 9600:CLS +0:CLS +1:CLS +2 
270 OPEN_NEW +8;RAM1_catalogo 

280 DIR +8,mdv1_ 

290 CLOSE +8 

300 OPEN_IN +8, ram1_catalogo 

310 INPUT +8,a$ 

320 INPUT 48,a$ 

330 IF EOF(+8)=1:G0 TO 460 

340 PAUSE 50 

350 INPUT +8,a$ 

360 CSIZE 3,1:CLS:AT 5,0:PRINT "Prog: ";¡a$ 
370 CSIZE 0,0:AT 18,30:PRINT "(S/N)" 
380 Cc$=INKEYS 

390 IF c$="s" OR c$="S":GO TO 420 
400 IF c$="n" OR c$="N":GO TO 330 
410 GO TO 380 

420 COPY "mdv1_"g£a$ TO "ram1_"g£a$ 
430 COPY "ram1_"g£a$ TO ser1 

440 DELETE "ram1_"g£a$ 

450 GO TO 330 

460 CLS:CLOSE +8 

470 DELETE ram1_catalogo 

480 DEFine PROCedure MENU 

490 CLS +0:CLS +1:CLS +2 

500 CSIZE 3,1 

510 AT 3,2:PRINT "Selecciona:" 

520 CSIZE 2,1 

530 AT 5,10:PRINT "1.-Spectrum -- QL" 
540 AT 7,10:PRINT "2.-QL -- Spectrum" 
550 LET Zz$-INKEYS 

560 IF z$="1":CASSQL 

570 IF z$="2":QLCASS 

580 GO TO 550 


El uso de una ramdisk en éste programa no es un capricho ya que como el 
intercambio de información a través de la ser1 se realiza sector a sector del 
Mdv con confirmación de haberlo recibido hbien,hay por cada uno de ellos un 
acceso al cartucho,una busqueda mas oO menos larga y una parada.Todo este 
trasiego mas el que se genera para la operación contraria es lento y laborioso 
es por lo que es preferible pasar toda la información de una sola vez a la RAM y 
allí hacerle todas las operaciones necesarias. 

Para el Spectrum realizé el programilla siguiente: 


1 CLS:PRINT AT 6,4;"Selecciona: " 
2 PRINT AT 10,10;"1.-QL--CASETTE" 
3 PRINT AT 12,10;"2.-CASETTE--QL" 
4 LET t$=INKEYS 

5 IF t$="1" THEN GOTO 10 

6 IF t$="2" THEN GOTO 1000 

7 GOTO 4 

1 


0 REM ERAKXKXAXAKXKKXRKKKXKKKKKXKXKX% 


X*kx*x0u« QL--CASETTE KXKXXX*X* 
ERAXRXXXXXXXKXXKXKRKKXXXKXKXXXxSo 

20 CLS:FORMAT "b";9600 

30 OPEN +4; "hb" 

40 INPUT "Nombre?...";z$ 

50 OPEN +46;"m";1;z$ 

60 MOVE +4 TO +6 

70 CLOSE +4:CLOSE +6 

80 *MOVE "m";1;z$ TO "C" 

90 ERASE "m";1;z$ 
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100 CLS:GOTO 30 


1000 REM XERAXRKXAKXKKXKKKXKKXKKKKXxXXx% 


*X*kxx* «uo CASETTE - -QL KKXXXXX* 
RAEKXXXXRXXKXXKXXKXKKXKXKXKXKKXXXX% 
1010 CLS:FORMAT "b";9600 
1020 *MOVE "C";;" " TO "m";1 
1030 OPEN +48;"b": INPUT "Nombre?...";a$ 
1040 ERASE "m";1;a$ 
1050 CLOSE +8:GOTO 1030 


Por supuesto antes de correr este programa en el Spectrum hemos de cargar el 
programa antes mencionado llamado COPIER para que las extensiones al BASIC estén 
activas. 

Todabia no se porque razón cuando se está ejecutando el programa y se llega 
a cualquier instruccion CLOSE +*x la pantalla del Spectrum se vuelve negra y se 
queda como hbloqueado sin pasar a ejecutar la línea siguiente.Se sale de ahí 
dando un BREAK y a continuacion CONTINUE. 

Y ya está,esto es todo lo que hay que ver.En una cinta C-60 se pueden meter 
hasta 6 Mdvs si no estan muy llenos(Aprox 500 a 550 k).Yo lo he utilizado casi 
dos años y funciona.Espero que lo mejoreis bastante y que lo publiqueis.Yo tengo 
discos de 3" y 3.5" pero puede remediar a otros colegas. 

Un saludo a todos y hasta la póxima..... 

Antonio Rodriguez Haz. 
Aptdo.2107 
30000 - MURCIA 


Se me ha ocurrido comprobar mi MDV demostración y no he encontrado la 
utilidad COPIER. Es posible que sea debido a que mi Interface I y Microdrive 
fuesen comprados en el verano de 1984 (con garantia INVES). 

Os vais a reir, se me ha ocurrido comprobar el cableado de mi cable QL/Z88 y 
resulta que coincide totalmente con el Interface 1 del Spectrum ¿Sabeis qué 
significa eso? Solamente hay un detalle que no debe afectar en absoluto, los 
pines 8 y 9 están soldados, pero no están conectados al QL (el 9 corresponde a 
+ 9 V y el 8 a ninguna conección). 

S. Merino, 17/6/1989. 


Programa de ENCUESTAS ALIMENTARIAS 

El proposito de este programa es llevar a cabo encuestas de alimentacion 
entre la poblacion española. 

El programa calcula a partir de los datos aportados sobre los sujetos sus 
necesidades diarias y las compara con sus ingestas. 

Mando tres versiones del mismo en basic, almacenado con Qload (_sav) y 
compilado con Qlib (_obj). 

Precisa para funcionar el toolkit2 (o por lo menos parte de el), tambien usa 
la (Qcalc (aunque no es precisa) y una ramdisc que no precise formateo (Qram o 
Qflash). Va mejor con disco pero puede funcionar en mdv. 

La primera pantalla nos permite seleccionar la configuracion que tenemos. 
Convendra tener en distinto drive los datos y los programas. Esta 
configuracion se puede alterar despues. 

La segunda pantalla nos pide el tipo de encuesta que se trata: 

1-Plato:Esta opcion solo nos calcula la composicion de un plato o menu que 
le vamos metiendo. 

2-Familia:Esta opcion permite ver el aporte en conjunto de una unidad 
familiar. 

Primero pregunta el numero de miembros, invitados etc. Si se realizan 
comidas fuera se tiene en cuenta. 

3-Colegio, 4-Guarderia,5-Residencia:Funcionan igual solo diferencian el 
nombre del fichero que se genera. 

6-Deportistas:Cambia el sistema de entrada preguntando talla y peso y 
deporte que practica. 

La informacion necesaria para seguir el programa esta siempre en pantalla y 
creo que esta a prueba de usuarios torpes. (Esta enfocado para ser usado por 
personal no cualificado informaticamente) 

Los alimentos pueden ser introducidos por su nombre o por Agcodigo. En 
pantalla aparece la forma de ver los codigos y nombres. 

Las cantidades consumidas se introducen en gramos, aparece en la pantalla 
superior, cantidades que nosotros utilizamos con el fin de standarizar pero 
que son meramente informativas. Permite los decimales con "." no con ",”, 
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La pantalla de resultados ofrece las ingestas recomendas, las ingeridas y 
su relacion en %. 

si se quiere mas informacion ofrece los alimentos consumidos 
individualmente y por grupos e informacion sobre los lipidos, protidos y 
glucidos. Dibuja al final unas barras con esos datos (aun no hace dump de el 
diagrama, ni dibuja sectores ya que no logro que funcionen bien). 

La informacion puede ser pasada a impresora. Al final genera un fichero que 
despues se usa en otro programa para elaboracion de datos en su conjunto (ya 
lo enviare otro dia). 

Las tablas de composicion de alimentos son las del CSIC completadas por las 
de ALTER. Las de requerimientos pertenecen al CSIC tambien. En el caso de 
deportistas se calculan sus necesidades en funcion de la superficie corporal. 

Para mas informacion contactar con Miguel Frasquet Pons. 

Miguel Frasquet Junio-89 


COMUNICANDO QL A SPECTRUM VIA RED LOCAL 


Con este articulo voy a intentar aclarar algo sobre el misterio de la 
posible compatibilidad de la QL NET con la ZX NET. 

En 1986 se podia leer en la revista ZX y TodoSpectrum que mucha gente habian 
intentado comunicar un QL con un Spectrum via red local, y no habian conseguido 
nada. Marcos Cruz en las páginas oO documentos QUILL de CUQ, también habia 
expuesto el tema, y decia que solamente habia conseguido comunicarlos en un solo 
sentido y con muchos errores. 

Estamos en Julio de 1989, tengo el Spectrum aparcado dentro del radio de 
acción del cable que nos suministran al comprar el QL o el interface Il. Se me 
ocurre una idea, ¿Porqué no probar la NET entre un QL y un Spectrum?. Sabia que 
no habia muchas esperanzas, porque nunca he leido nada sobre alguien que haya 
tenido éxito. Pero en nuestro caso y con la suerte que yo tengo, será diferente. 

Se supone que hemos puesto en funcionamiento el QL y el Spectrum con cable 
NET y todo. Entonces empezamos a teclear (los comentarios indican cual es el 
ordenador): 


FORMAT "n";4 

OPEN +44;"n";3 

OPEN 45;"m";1;"prueba" 

MOVE +4 TO +5 

* QL 

COPY ram1_prueba to neto_4 

* Ahora en el MDV del Spectrum se graba muy rápido el fichero prueba 

* 2Zx 

CLOSE +45 

MOVE "m";1;"prueba" TO +2 

* El fichero prueba en el MDV1 del Spectrum se va SCROLLando en su pantalla 

MOVE %4 TO +2 

* QL 

COPY ram1_prueba to neto_4 

* Ahora el fichero prueba del QL se va SCROLLando en la pantalla del 
Spectrum. Pulse ENTER cada vez que vea SCROLL? 

* 2Zx 

CLOSE +44 


La calidad de la transmisión se merece un CERO errores. En todos los casos 
probados no he tenido ni un solo error. Hay que tener en cuenta que el código 
fin de linea en un QL es 10 y en un ZX es 13. Los ficheros deben enviarse desde 
el QL siempre desde RAMDISK, porque desde MDV ni pita, ni chifla. 

El proceso inverso, enviar el mismo fichero desde Spectrum a QL, funciona 
muy lentamente, pero los errores son del 40%, porque la transmisión es tan pobre 
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(parece la linea de Telefónica Española) que casi todos los caracteres llegan 
cambiados al QL. 

Si alguien tenia alguna duda, el misterio ha sido desvelado cuando nadie 
estaba interesado por ello. Ahora habria que buscar ¿Quién está interesado en 
enviar ficheros al Spectrum?. El único defecto es que la comunicación fiable 
solamente puede hacerse desde QL a Spectrum (un solo sentido). 

S. Merino, Fuengirola, 18/6/1989. 


PROGRAMA Zo QZ 

AUTOR : DAVID BATTY 

PRECIO : 25 LIBRAS con cables 
EDITOR : SECTOR SOFTWARE 


39 Wray Crescent, 

Ulnes Walton, 

Leyland, 

Lancashire. PR5 3NH (UK) 


Prácticamente se podria decir que me ha llegado el QZ dos meses 
después de comprar mi Z88. Seguramente el motivo de su retraso ha sido 
el que me hayan enviado la última versión, la v2.05 en vez de la v2.0. 
Pero a mi lo único que me interesaba era el cable, pues el software 
podria haberlo escrito yo en Superbasic, Assembler o FORTH. 

Retrocedamos a Enero-Febrero 1988 en la revista Z88 EPROM (la 
revista de Z88 USER CLUB), alli tenemos dos comentarios de dos 
programas: "QZ" QL-Z88 Transfer Software from Sector Software y "QL 
Transfer" from Z88 User Club. 

En la v1.0 de QZ el menu es: 

: Send to Z88 

Receive from Z88 

Directory device 

Rename a file 

print a file 

Delete a file 

view a file 

Quit to BASIC 

: Translate CR - switchable between thw QL's carriage return code 
(10) and The Z88's (13). 


O0OO0ONXOOMAO0ONE 


En la v1.0 de "QL Transfer" las opciones en el menu son: 

Batch Receive 

End Batch 

Receive file 

Send File 

Print Z88 output 

Directory - obvious 

Convert QL ASCII file to Pipedream 

Name Change - renaming of Z88 files, not a simple 'rename' utility 
Quit 


La diferencia entre las dos versiones es que la "QL Transfer" de 
Z88 User Club es gratis para los socios. Y otra diferencia es que la 
versión 1.0 es mejor que la QZ v1.0. 

Pero volvamos al presente, a la versión 2.0 (la v2.05 se explicará 
al final). Se le ha añadido al QZ las siguientes opciones: 

S Send a file from QL to Z88 
Read a File from Z88 to the QL 
Batch receive files from the Z88 
Directory of a device 
Send endbatch code 
Rename a file 
Kill a file 


ANMMUDWJ 
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V View a file 

P Panel (Change defaults etc) 

T Translate carraige returns 

También se explica los pasos a dar para transferir un fichero 
QUILL a Pipedream y viceversa. 

El cable suministrado por Sector Software está configurado para 
SER2 (para SER1 habria que recablearlo). 

QZ V2.05 es un parche para la v2.0, la cual debia ofrecer 
converciones de ficheros Archive a formato Pipedream y viceversa, pero 
no se pudo añadir esa opción en el lanzamiento de la v2.0, porque el 
programador no tuvo tiempo de escribirla. Se podria decir que he sido 
uno de los primeros en obtener la v2.05. 

El QZ es un programa escrito en Superbasic y compilado con TURBO. 

Este comentario ha sido totalmente escrito en un Z88 versión 
Español, salvado usando la opción PLAIN TEXT de Pipedream, transferido 
a mi QL MGE, el fichero ha tenido que ser traducido con mi programa 
TRADUCTOR QZ (ya lo vereis en un próximo número), finalmente ha sido 
importado a TURBO_XCHANGE v3.87. 

S. Merino, Fuengirola, 13/6/1989. 
P.D: Hay que agregar que los resultados son un poco raros, pero funciona o 
eso parece.. 


PROGRAMA : BIOgraph 
PRECIO : 20 LIBRAS 
DISTRIBUIDOR : ¡imaQLate software 
42 Albion Street, 
Broadstairs Kent CT10 1NE (UK) 


Ejem... normalmente yo no suelo comprar este tipo de programas, quien 
lo ha comprado es un amigo que le gusta estas curiosidades y no tiene 
tiempo para comentarlo. 

Como su nombre indica, es un programa que calcula los bioritmos de 
una persona. Las instrucciones son pocas (6 páginas). Prácticamente lo 
único que hay que hacer es introducir nuestra fecha de nacimiento, 
elegir la fecha, y seleccionar las opciones que queramos (imprimir en 
impresora, ver el gráfico de 6 meses, analisis de cuqlquier dia....). 

Existen 3 ciclos: PHYSICAL (23 dias), INTELLECTUAL (33 dias) y 
EMOTIONAL (28 dias). 

Según el manual, los Bioritmos comenzaron a utilizarse por 
cientificos Europeos a principios del siglo XX. Los Bioritmos se han 
extendido por todo el mundo, especialmente Japón y Suiza donde son 
usados por organizaciones de negocios, hospitales y lineas areas. 

Según mi opinión, no sé hasta que punto puede ser cierto esto del 
Biograh, pero no creo sea muy útil, quizás sea un pasatiempo divertido 
para ejecutivos. Esto suena a Horóscopo, pero a base de gráficos tipo 
EASEL. 

El programa ha sido escrito en Superbasic y compilado con TURBO. Usa 
GPRINT_prt con permiso de Psion (aunque cualquiera puede usar esas 
rutinas en sus programas). 

Según mi opinión, es un programa rápido, gracioso para algunos y 
-sin comentarios-. 

Portada suministrada en este número pertenece a BlIOgraph. 

S. Merino, Fuengirola, 16/6/1989 


RECTIFICAR ES DE SABIOS 


No sé si alguno se acuerda de un paquete de matemáticas de 64 bits 
que escribí las pasadas navidades. Bueno, pues algo me dice que poca 
gente lo ha probado. En ese paquete existe un pequeño error debido en 
gran parte a las prisas. Una palabra está incompleta de definición: 


2LCONSTANT CREATE SWAP 2SWAP SWAP , , , , DOES> 2LQ( ; 
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Me he dado cuenta del error cuando recibí el Quanta de abril hoy. 
Se habria estrabiado en correos porque los números de Mayo y junio ya 
los habia recibido, y el matasellos tiene fecha de abril. 
S. Merino, Fuengirola, 27/6/1989 


PROGRAMA PARA REALIZAR COMPROBACIONES DE RESULTADOS EN COMBINACIONES 
DEL JUEGO DE LA LOTERIA PRIMITIVA Y BONO LOTO PARA CUALQUIER TIPO DE 
APUESTAS ES DECIR 

PARA NUMEROS BOLETO CON 1 APUESTAS 
NUMEROS BOLETO CON 7 APUESTAS 
NUMEROS BOLETO CON 28 APUESTAS 
PARA NUMEROS BOLETO CON 84 APUESTAS 
PARA 10 NUMEROS BOLETO CON 210 APUESTAS 
PARA 11 NUMEROS BOLETO CON 462 APUESTAS 


uo) 
> 
o) 
> 
000 


PROGRAMA PARA EL Z88 


100 CLEAR 

105 CLS: INPUT "DIME EL NOMBRE DEL ARCHIVO A VER . PONER :RAM.numero/nombre 
" ¡ARS 

110 AS=ARS$ 

115 A=OPENIN(AS) 

120 NC=0 

125 REPEAT 

130 NC=NC+1 

135 INPUT+*A, X$ 

140 UNTIL EOFXA 

145 CLOSERA 

150 DIM CB$(NC):DIM T%(49):DIM X%(49):DIM Q%(6):DIM POTAL$(NC) 

155 NCC=0:CLS 

160 A=OPENIN(AS) 

165 REPEAT 

170 NCC=NCC+1 

175 PRINT TAB(0,0)"ESTOY CARGANDO LAS COMBINACIONES ";NCC 

180 INPUT+*A, X$ 

185 CB$(NCC)=X$ 

190 UNTIL EOFXA 

195 CLOSERA 

200 FOR YYY=1 TO 49:T%(YYY)=0:NEXT YYY 

205 PRINT "DIME LOS NUMEROS GANADORES. PARA VER OTRO ARCHIVO PON -1 " 

210 COMBIS$="" 

215 FOR J=1 TO 6 

220 PRINT J;" DATO ";: INPUT X$ 

225 IF X$="-1":RUN 

230 IF K$=" " :GOTO 205 

235 IF K$=""  :GOTO 205 

240 IF VAL(X$)>=50:GOTO 205 

245 COMBIS$=COMBIS+"_"+X$ 

250 T%(VAL(X$))=1 

255 NEXT J 

260 INPUT " DIME EL NUMERO COMPLEMENTARIO ";X$ 

265 T%(VAL(X$))=2 

270 COMBIS$=COMBIS+" COMPL. "+XS$ 


275 INPUT " DIME EL NUMERO DEL SORTEO "¡SORTEOS 
280 INPUT " DIME LA FECHA DEL SORTEO "¡FECHAS 
285 FOR YYY=1 TO NC:POTALS(YYY)="":NEXT YYY 

290 CLS 

295 POT$="" 


300 C6=0:CC=0:C5=0 
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305 C4=0:C3=0:C2=0 
310 C1=0:C0=0 
315 IP=0 
320 FOR I=1 TO NC 
página 1 

325 CX6=0:CXC=0:CX5=0: CX4=0:CX3=0 
330 CX2=0:CX1=0:CX0=0: IXP=0 
335 C=LEN(CB$(1)) 
340 D=C/2 
345 FOR YYY=1 TO D:X%(YYY)=0:NEXT YYY 
350 0=1:P=2 
355 FOR R=1 TO D 
360 X%(R)=VAL(MIDS$(CB$(1),0,P)) 
365 0=0+2 
370 NEXT R 
375 FOR R1=1 TO D-5 
380 FOR R2=2 TO D-4 
385 IF R2<=R1:GOTO 475 
390 FOR R3=3 TO D-3 
395 IF R3<=R2:GOTO 470 
400 FOR R4=4 TO D-2 
405 IF R4<=R3:GOTO 465 
410 FOR R5=5 TO D-1 
415 IF R5<=R4:GOTO 460 
420 FOR R6=6 TO D 
425 IF R6<=R5:GOTO 455 
430 FOR YYY=1 TO 6:Q%(YYY)=0:NEXT YYY 
435 Q%(1)=X%(R1):Q%(2)=X%(R2) 
440 Q%(3)=X%(R3) : Q%(4)=X%(R4) 
445 Q%(5)=X%(R5) :0%(6)=X%(R6) 
450 PROCRESUL 
455 NEXT R6 
460 NEXT R5 
465 NEXT R4 
470 NEXT R3 
475 NEXT R2 
480 NEXT R1 
485 K=CX6:PROCM(K) 
490 K=CXC:PROCM(K) 
495 K=CX5:PROCM(K) 
500 K=CX4:PROCM(K) 
505 K=CX3:PROCM(K) 
510 K=CX2:PROCM(K) 
515 K=CX1:PROCM(K) 
520 K=CX0:PROCM(K) 
525 NEXT 1 
530 W=C6:PROCY (W) 
535 W=CC: PROCY (W) 
540 W=C5:PROCY(W) 
545 W=C4: PROCY (W) 
550 W=C3:PROCY (W) 
555 W=C2:PROCY (W) 
560 W=C1:PROCY(Ww) 
565 W=C0: PROCY (W) 
570 PRINT TAB(0,0)"COMBINACION GANADORA EN SORTEO ";SORTEOS$;" CON FECHA "; 

FECHAS$;" ES "; 
575 LT="" 
580 FOR I=1 TO 49 
585 IF T%(1)=1:LTS=LTS+STR$(1)+"__" 
590 IF T%(1)=2:X=1 
595 NEXT I 
600 LT$=LT$+" COMPL. "+STR$(X) 
605 PRINT LTS 
610 PRINT "RESULTADO GLOBAL DE ACIERTOS . PULSA CUALQUIER TECLA PARA VER 

RESULTADOS INDEPENDIENTES e 
615 LT$=INKEYS(-1) 
620 PROCVER 
625 END 

página 2 
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630 
635 
640 
645 
650 
655 
660 
665 
670 
675 
680 
685 
690 
695 
700 
705 
710 
715 
720 
725 
730 
135 
740 
745 
750 
755 
760 
765 
770 
775 
780 
785 
790 
795 
800 
805 
810 
815 
820 
825 
830 
835 
840 
845 
850 
855 
860 
865 
870 
875 
880 
885 
890 
895 
900 
905 
910 
915 
920 


925 
930 


935 
940 
945 
950 
955 
960 
965 


DEF PROCRESUL 
AI=0:CP=0 
FOR J=1 TO 6 


IF T%(Q%(J))=1:AI=AI+1 


IF T%(Q%(J))=2:CP=1 


NEXT J 

IF AI=0:PROCC_0 
IF Al=1:PROCC_1 
IF Al=2:PROCC_2 
IF Al=3:PROCC_3 
IF Al=4:PROCC_4 
IF Al=5:PROCC_5 
IF AI=6:PROCC_6 


PRINT TAB(0,0)"REVISO COMBINACIONES SOBRE COMBINACION GANADORA ";I 


ENDPROC 

DEF PROCC_0 
CO=C0+1 

CXO=CX0+1 

PRINT TAB(60, 4)"DE 
ENDPROC 

DEF PROCC_1 
C1=C1+1 

CX1=CX1+1 

PRINT TAB(40,4)"DE 
ENDPROC 

DEF PROCC_2 
C2=C2+1 

CX2=CX2+1 

PRINT TAB(20,4)"DE 
ENDPROC 

DEF PROCC_3 
C3=C3+1 

CX3=CX3+1 

PRINT TAB( 0,4)"DE 
ENDPROC 

DEF PROCC_4 
C4=C4+1 

CX4=CX4+1 

PRINT TAB(60,2)"DE 
ENDPROC 

DEF PROCC_5 


IF CP=1:PROCC5C:GOTO 


C5=C5+1 

CX5=CX5+1 

PRINT TAB(40,2)"DE 
ENDPROC 

DEF PROCC5C 
CC=CC+1 

CXC=CXC+1 


0> 


1> 


2> 


3> 


4> 


5> 


855 


"CO 


SGL 


"5C2 


":C3 


1=C4 


"05 


PRINT TAB(20,2)"DE 5C> ";CC 


ENDPROC 

DEF PROCC_6 
C6=C6+1 

CX6=CX6+1 

PRINT TAB( 0,2)"DE 
ENDPROC 

DEF PROCPANTALLA 
CLS 


PRINT "COMBINACION GANADORA 


'" DEL "¡FECHAS 


PRINT " 6. 5C. 5. 


ENDPROC 


DEF PROCVER 
PROCPANTALLA 

H=0 

FOR I=1 TO NC 
PROCMIRO 

KK=1 

PRINT POTAL$(1);" 


6> 


4. 


";C6 


3. Zi Lo 


página 3 


"> :PROCMM(KK) 


"+COMBI$;" EN SORTEO 


O. 


BOLETO COMBINACION " 


" SORTEOS; 
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970 
975 
980 


985 
990 


995 


1000 
1005 
1010 
1015 
1020 


1025 
1030 
1035 
1040 
1045 
1050 
1055 
1060 
1065 
1070 
1075 
1080 
1085 
1090 
1095 
1100 
1105 
1110 
1115 
1120 
1125 
1130 
1135 
1140 
1145 
1150 
1155 


1160 
1165 
1170 
1175 
1180 
1185 
1190 
1195 
1200 
1205 


PRINT " '";:PROCT:PRINT "  ";CB$(0) 
NEXT I 
IF H<=6:PRINT TAB(0,8)"COMBINACION GANADORA ";COMBIS;" EN SORTEO 
_ "»SORTEOS;" DEL __ ";FECHAS; 
O$=INKEYS (-1):CLS 
PRINT:PRINT " TOTAL DE PREMIOS OB 
TENIDOS '":PRINT 
PRINT "COMBINACION GANADORA "COMBIS;" EN SORTEO " SORTEOS; 
'" DEL __ ";FECHAS 
PRINT 
PRINT " 6. 5C. 5. 4. 3. 2. 1. 0." 
PRINT 
PRINT POTS 
INPUT TAB(0,0)"VER OTRA VEZ PON 1 SALIR PON 2 
eL 


IF 1=1:PROCVER 


IF I=2:CLS:GOTO 200 

GOTO 1020 

CLS 

ENDPROC 

DEF PROCM(K) 

U$=" ; "”" 

IF K<= 9:VV$="--":GOTO 1075 

IF K<=99:VV$="-" :GOTO 1075 
POTAL$(1)=POTAL$(I)+STR$(K)+U$:GOTO 1080 
POTAL$(1)=POTALS$(1)+VV$+STRS$(K)+U$ 
ENDPROC 

DEF PROCMM(KK) 

IF KK<= 9:PRINT "00";KK;:GOTO 1105 
IF KK<=99:PRINT "0";KK;:GOTO 1105 
IF KK<=9999:PRINT ¡KK; 


ENDPROC 

DEF PROCY(W) 

U$=" A "” 

IF W<= 9:VV$="--":GOTO 1135 
IF W<=99:VV$="-" :GOTO 1135 


POT$=POT$+STR$(W)+U$:GOTO 1140 

POT$=POTS$+VVS$+STRS(W)+U$ 

ENDPROC 

DEF PROCMIRO 

H=H+1 

IF H=7:PRINT TAB(0,8)"COMBINACION GANADORA ":COMBIS;" EN SORTEO 
"SORTEOS; " DEL __ ";¡FECHAS; :O$=INKEYS(-1):PROCPANTALLA : H=1 


ENDPROC 


DEF PROCT 
C=LEN(CB$(1)) 

D=C/2 

0=1:P=2:CB$(0)="":U$="." 

FOR RR=1 TO D 
CB$(0)=CB$(0)+MID$(CB$(I),0,P)+U$ 
0=0+2 

NEXT RR 

END PROC 


PROGRAMA PARA REALIZAR ARCHIVOS DE COMBINACIONES QUE SE HAN DE APOSTAR 
AL JUEGO DE LA LOTERIA PRIMITIVA Y BONO LOTO PARA CUALQUIER TIPO DE 


página 4 


APUESTAS ES DECIR 


SELECCIONAMOS 11 NUMEROS : 1.4.6.13.22.34.36.39.40.43.49 


ARCHIVO PARA 6 NUMEROS 1 APUESTA PONER 010406132234 


7 NUMEROS 7 APUESTA Ñ 01040613223436 
, 8 NUMEROS 28 APUESTAS si 0104061322343639 
E 9 NUMEROS 84 APUESTAS eS 010406132234363940 
e 10 NUMEROS 210 APUESTAS e 01040613223436394043 
n 11 NUMEROS 462 APUESTAS E 0104061322343639404349 


. FIN PARA ABANDONAR ENTRADA 
DATOS EN ARCHIVO CREADO 


cuq11.txt 


Agosto 1989 


CUQ número 11 19 / 21 


PROGRAMA PARA EL Z88 


100 CLS 
110 PRINT "PARA REALIZAR UN ARCHIVO DE COMBINACIONES SE DEBEN INTRODUCIR DE 
LA SIGUIENTE FORMA. EJEMPLO :" 


120 PRINT "PARA 6 NUMEROS 1,2,3,4,5,6 SE HA DE INTRODUCIR ASI 
010203040506" 

130 PRINT "PARA 7 NUMEROS 1,2,3,4,5,6,7 SE HA DE INTRODUCIR ASI 
01020304050607" 

140  PRINT "EL MAXIMO DE NUMEROS EN APUESTAS ES HASTA Ad 
0102030405060708091011" 

150 PRINT 


160 INPUT "DIME EL NOMBRE DEL ARCHIVO A CREAR PONER :RAM.numero/nombre "¡AS 

170 A=OPENOUT(AS$) 

180 NC=0 

190 REPEAT 

200 NC=NC+1 

210 PRINT "INTRODUCES LA ___";¡NC;: INPUT " a. COMBINACION . PARA FINALIZAR 
PONER FIN > "¡AS 

220 IF A$="FIN":GOTO 250 

230 IF A$="":GOTO 210 

240 IF A$=" ":GOTO 210 

250 UNTIL A$="FIN" 

260 CLOSEXA 

270 END 


Pedro Egea, Baleares, 19/6/1989. 


Quele Club 

Asi se llama un club que se dedica a la compra-venta de soft para el QL. 
Basicamente trabaja con programas comerciales. El motivo de traerlo aqui es 
contaros mi experiencia. 

Es evidente que se trata de pirateria, pero asi como otros compran entre 
varios programas (lo cual yo veo licito) y comparten el precio aqui te los 
cobran y bien cobrados. Cierto que la comodidad de tenerlos a mano, rapidez y 
posibilidad de consulta en castellano tiene su precio, pero estimo que no 
tanto. Lo de pirateria lo digo porque el fines lucrativo, no se dedica a 
cubrir los gastos o0asincrementar el soft disponible. No obstante yo por pura 
vagancia y por mi desconocimiento del lenguaje de la "perfida albion" me he 
venido surtiendo de ellos. Pasemos al grano. 

Ya le comente a Salvador los problemas que tenia con Lightning (desde ahora 
lig), pero los comento aqui: 

Al cargarlo si hago NEW desaparece la imagen y a resetar. 

A1 cargarlo si intento arrancar un programa con QLRUN lo mismo. 

Al arrancarlo si intento cargar el Xchange idem. 

Puesto al habla con el jefe del Club (Jorge por mas señas) me dice que a 
llos les va bien pero que lo probaran. Lo prueban y funciona bien. Solo me 
dicen que tal vez el problema este en mi rom que es MGE y la suya es inglesa. 

¿Creeis esto posible? 

Mas aun si cargo el speedscreen conjuntamente funciona bien todo. Yo no lo 
entiendo, ellos tampoco. 

De todas formas me han mandado otra copia para que pruebe, pero el resultado 
es el mismo. 

Tambien les compre el emulador de MSDOS (19000), va bien pero la version de 
MSDOS que me han enviado no tiene todos los comandos (eso lo van a arreglar) y 
al ser la version 4.0 de IBM en castellano tiene el BASICA y BASIC que no 
pueden ser emulados. Manual en castellano , 2 tomos mamotreticos. 

En fin con esto podeis haceros una idea de como funciona el asunto de Quele 
Club. Creo que sale mas a cuenta pedirlo a Ingland o incluso a Italia (mas 
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barato). Pero la informacion no ocupa lugar y ahi la teneis. Si alguien esta 
interesado la direccion la tengo yo y creo que Salvador tambien la conoce. 
Por cierto ¿se podria poner en rom (eprom) el lig.? , tal como se hizo con 
speedscreen. 
Miguel Frasquet 31-5-89 


NEW AGE MUSIC 


Intentaré dar a conocer un poco lo que se sobre este tipo de música, con el 
único fin de conseguir que si alguien no tiene ni idea de lo que va la escuche y 
pueda decidir por sí mismo. 

La respuesta más común entre mis amigos a la pregunta de si conocen algo 
sobre la música de la new age suele ser ¿new qué?, lo cual resulta un poco 
frustante ya que parece que eres el único que escucha esto. 

Lo primero que debo hacer es intentar definir lo que se entiende por este 
tipo de música y aquí surge el mayor de los problemas ya que no creo que nadie 
pueda definirlo, lo único que puedo decir sin miedo a equivocarme es que es 
música que no te invita a bailar sino más bien a relajarte escuchándola sentado 
a poder ser en un sofá. 

Otra pregunta que podria surgir es, ¿qué intrumentos se utilizan?, y por lo 
que llevo oido os puedo decir que todos, desde los más clásicos como el piano 
hasta los más modermos aparatos electrónicos. 

Dentro de los compositores que me acuerde ahora mismo podría citar a Win 
Mertens que es pianista me parece que belga, Lito Vitale es argentino, Enia es 
una chica irlandesa que supongo que alguno conocerá por su último elepé 
Watermark que alcanzó gran éxito en Inglaterra, (disculpar si alguien conoce los 
nombres de estos músicos ya que al escribirlos de oidas solo, puede haber 
grandes faltas de ortografía, pero por lo menos así es como suenan) estos son 
solo un pequiñísimo ejemplo. 

Frente a la fastuosidad y los grandes montajes de los mitos pop esta gente 
suele trabajar en su casa con sus ordenadores y sus sintetizadores, haciendo 
desaparecer en gran parte la ¡imagen de horas y horas en los estudios de 
grabación, llegando a ellos con su música totalmente hecha grabada en algun 
disco y hacer el master en el mínimo tiempo. 

Un problema que surge al intentar conseguir algun dísco de estos músicos es 
que los encuentras en sitios muy contados, (yo solo conozco un sitio que es 
tambien una librería en Gijon llamado Paradiso, es un sitio realmente precioso) 
ya que como es un producto que se suele vender muy poco para que se van a 
molestar, otro segundo problema por lo menos para mí es que mucha de esta música 
se está editando solo en disco compacto, ¿sabeis que se va ha dejar de editar 
música en los discos de vinilo sin que pase mucho tiempo? ya que el volumen de 
ventas a nivel mundial ya ha sido adelantado por el disco compacto y en tanto 
por ciento es una ridiculez frente a los cassetes. 

Si hay alguien que amaloacabar de leer esto pueda quedar interesado puede 
escuchar el programa Diálogos 3, en RNE 3, está presentado el programa por 
Ramón Trecet (si el mismo que presenta los partidos de baloncesto de la NBA) y 
es de 3 a 4 todos los días de lunes a viernes. 

Espero que os guste. 


Celestino Alvarez 
Asturias (22-5-89) 


Compro ampliación de memoria de 512k, el que desee vendermela puede escribir 
a la siguiente dirección: 
Celestino Alvarez Pérez 
C/La Talamera 24 
33930 Barros 
Asturias 
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